home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 February / Chip_2003-02_cd1.bin / zkuste / xptools / install / Xsetup / setup.exe / {app} / plugins / XQ WinXP Find Files Options 2.xpl < prev    next >
Text File  |  2002-10-31  |  1KB  |  47 lines

  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH"="Appearance\System\Find Files Dialog"
  5. "NAME"="Find Files Dialog Appearance"
  6. "VERSION"="1.00"
  7. "LANGUAGE"="VBScript"
  8. "OSVERSION"="000001"
  9. "TEXT 1"="Use new Task-/Wizard-based search"
  10. "DESCRIPTION 1"="By default, Windows uses a task-based (aka Wizard-based) search dialog."
  11. "DESCRIPTION 2"="This dialog is good for new users, but might be too stupid for advanced users."
  12. "DESCRIPTION 3"="Activate this option to have the new task-based search or deactivate it to search using the old-school search dialog."
  13. "AUTHOR"="Xteq Systems"
  14. "CONTACTURL"="http://www.xteq.com/"
  15. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  16. "COMMENT 1"=" "
  17.  
  18.  
  19. 'Declaration of some constants
  20. sV1="HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\CabinetState\Use Search Asst"
  21.  
  22.  
  23.  
  24. 'Called when the Plugin is started
  25. SUB Plugin_Initialize 
  26.  s=RegReadValue(sV1)
  27.  If s="yes" or IsEmpty(s) then SetUIElement 1,true
  28. END SUB
  29.  
  30. 'Called when the Plugin should validate the Data the user has entered
  31. SUB Plugin_CheckData(ElementIndex)
  32. END SUB
  33.  
  34. 'Called when the Plugin should apply the changes
  35. SUB Plugin_Apply(ElementIndex,ElementSubIndex) 
  36.  if GetUIElement(1)=true then
  37.     if RegValueExists(sV1) then Call RegDeleteValue(sV1)
  38.  else
  39.     Call RegWriteValue(sV1,"no",1)
  40.  end if
  41. END SUB
  42.  
  43.  
  44. 'Called when the Plugin is about to be removed from memory
  45. SUB Plugin_Terminate
  46. END SUB
  47.